VBA中查询工作簿中是否含有指定名称工作表的方法

您所在的位置：网站首页 › vba 工作表名称模糊查找怎么弄 › VBA中查询工作簿中是否含有指定名称工作表的方法

VBA中查询工作簿中是否含有指定名称工作表的方法

2024-04-16 08:32| 来源: 网络整理| 查看: 265

VBA中经常会有一个这样的需求，在执行运算之前需要先判断指定工作表名称是否存在，否则程序将会报“下标越界”的错误，给用户不好的体验

我所知晓的查询工作表名称通常有3种方法：

一、遍历所有工作表，如果工作表的名称等于指定名称，则反馈存在

for each ws in worksheets if ws.name = "指定名称" then msgbox "存在" exit for else msgbox "不存在" end if next ws

二、利用“下表越界”错误来判断

Function SheetIsExist(strExcleName As String, strSheetName As String) As Boolean '//判断名称的工作表是否已经在指定的Excel文件中存在 Dim shtSheet As Worksheet SheetIsExist = False On Error GoTo lab1 Set shtSheet = Workbooks(strExcleName).Sheets(strSheetName) If shtSheet Is Nothing Then SheetIsExist = False Else SheetIsExist = True End If Set shtSheet = Nothing Exit Function lab1: SheetIsExist = False End Function

在学习过程中记录一下，以备查阅

【本文地址】

VBA中查询工作簿中是否含有指定名称工作表的方法

VBA中查询工作簿中是否含有指定名称工作表的方法

今日新闻

推荐新闻